Ladeprogramm:
 SCREEN 1,640,256,4,2
 WINDOW 1,"        V I D E O D A T E I  V 1.05  © 1988 by JR-Soft (Junker/Rauprich)",,0,1
 i=4
 FOR a=0 TO 11
  COLOR i,0
  LOCATE 25,15 : PRINT " .... das HAUPTPROGAMM wird geladen, bitte warten!"
  i=i+1 : IF i=6 THEN i=4
 NEXT a
 CLEAR ,80000
 CHAIN "video0.5MB"